home *** CD-ROM | disk | FTP | other *** search
/ 10 jaar 1990-2000 / 10 JAAR HVB.bin / data / 01-5 / DUBFILE.BAT < prev    next >
Encoding:
DOS Batch File  |  1992-07-24  |  3.4 KB  |  113 lines
  1. echo off
  2. cls
  3. if exist GETKEY.COM GOTO START
  4. echo bestand GETKEY.COM niet gevonden
  5. pause
  6. GOTO BREEKAF
  7. :START
  8. if exist DUBBEL.COM GOTO START2
  9. echo bestand DUBBEL.COM niet gevonden
  10. pause
  11. GOTO BREEKAF
  12. :START2
  13. echo ******************************************************************************
  14. echo *                                DUBFILE                                     *
  15. echo ******************************************************************************
  16. echo *                                                                            *
  17. echo * Het programma DUBFILE kan gebruikt worden om een overzicht te maken van    *
  18. echo * bestanden, die meerdere keren voorkomen op dezelfde schijf.                *
  19. echo *                                                                            *
  20. echo *                                                                            *
  21. echo *              Kies nu uit de onderstaande mogelijkheden:                    *
  22. echo *                                                                            *
  23. echo *                    1. Overzicht A: op het scherm                           *
  24. echo *                    2. Overzicht A: op de printer                           *
  25. echo *                    3. Overzicht B: op het scherm                           *
  26. echo *                    4. Overzicht B: op de printer                           *
  27. echo *                    5. Overzicht C: op het scherm                           *
  28. echo *                    6. Overzicht C: op de printer                           *
  29. echo *                    7. Overzicht D: op het scherm                           *
  30. echo *                    8. Overzicht D: op de printer                           *
  31. echo *                    9. Einde programma                                      *
  32. echo *                                                                            *
  33. echo *                                                                            *
  34. echo ******************************************************************************
  35. :BEGIN
  36. getkey
  37. IF ERRORLEVEL 9 GOTO NEGEN
  38. IF ERRORLEVEL 8 GOTO ACHT
  39. IF ERRORLEVEL 7 GOTO ZEVEN
  40. IF ERRORLEVEL 6 GOTO ZES
  41. IF ERRORLEVEL 5 GOTO VIJF
  42. IF ERRORLEVEL 4 GOTO VIER
  43. IF ERRORLEVEL 3 GOTO DRIE
  44. IF ERRORLEVEL 2 GOTO TWEE
  45. IF ERRORLEVEL 1 GOTO EEN
  46. GOTO BEGIN
  47. :EEN
  48. echo off
  49. cls
  50. echo OVERZICHT DUBBELE BESTANDEN A:
  51. echo ------------------------------
  52. dubbel A:
  53. GOTO EINDE
  54. :TWEE
  55. echo off
  56. cls
  57. echo OVERZICHT DUBBELE BESTANDEN A: > prn
  58. echo ------------------------------ > prn
  59. dubbel A: > prn
  60. GOTO EINDE
  61. :DRIE
  62. echo off
  63. cls
  64. echo OVERZICHT DUBBELE BESTANDEN B:
  65. echo ------------------------------
  66. dubbel B:
  67. GOTO EINDE
  68. :VIER
  69. echo off
  70. cls
  71. echo OVERZICHT DUBBELE BESTANDEN B: > prn
  72. echo ------------------------------ > prn
  73. dubbel B: > prn
  74. GOTO EINDE
  75. :VIJF
  76. echo off
  77. cls
  78. echo OVERZICHT DUBBELE BESTANDEN C:
  79. echo ------------------------------
  80. dubbel C:
  81. GOTO EINDE
  82. :ZES
  83. echo off
  84. cls
  85. echo OVERZICHT DUBBELE BESTANDEN C: > prn
  86. echo ------------------------------ > prn
  87. dubbel C: > prn
  88. GOTO EINDE
  89. :ZEVEN
  90. echo off
  91. cls
  92. echo OVERZICHT DUBBELE BESTANDEN D:
  93. echo ------------------------------
  94. dubbel D:
  95. GOTO EINDE
  96. :ACHT
  97. echo off
  98. cls
  99. echo OVERZICHT DUBBELE BESTANDEN D: > prn
  100. echo ------------------------------ > prn
  101. dubbel D: > prn
  102. GOTO EINDE
  103. :NEGEN
  104. GOTO BREEKAF
  105. :EINDE
  106. pause
  107. echo off
  108. cls
  109. DUBFILE.BAT
  110. :BREEKAF
  111. echo off
  112. cls
  113.